﻿Imports System.Data.SqlClient
Public Class FrmTypeEditor

    Private Sub btnOk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOk.Click
        'If txtTypeId.Enabled Then
        '    cmd.ExecuteNonQuery("INSERT INTO Type VALUES(N'" & txtTypeName.Text & "',1)")
        'Else
        '    cmd.ExecuteNonQuery("UPDATE Type SET type_name=N'" & txtTypeName.Text & "' WHERE type_id='" & txtTypeId.Text & "'")
        'End If

        'Me.DialogResult = Windows.Forms.DialogResult.OK
        
    End Sub

    Private Sub tbnCancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tbnCancel.Click
        Me.Close()

    End Sub
End Class